home *** CD-ROM | disk | FTP | other *** search
/ Mega Guia 2004 June / Mega Guia: 2004-06.iso / _files / free / myalbum / ES / myalbumsetup.exe / {app} / DemoJScript.js < prev    next >
Text File  |  2003-02-16  |  564b  |  22 lines
  1. // Simple JScript script for MyAlbum
  2. //   Get the current album, list all
  3. //   pictures and select them
  4.  
  5. App.ClearTrace();
  6. App.Trace( "MyAlbum version: " + App.Version, -1, TRACE_INFORMATION );
  7.  
  8. var alb = App.GetCurrentAlbum(), s;
  9.  
  10. nb = alb.nbPicture;
  11. App.Trace( "Pictures in this album: " +  nb, -1, TRACE_INFORMATION );
  12.  
  13. for (i = 0; i < nb; i++) {
  14.     pic = alb.GetPicture(i);
  15.     pic.bSelected = 1;
  16.     s = pic.sShortFileName + " - " + pic.sCommentFirstLine;
  17.     App.trace(  s );
  18. }
  19. alb.ReDraw();
  20.  
  21. App.trace( "Done !", -1, TRACE_GREENDOT );
  22.